Labels:text | screenshot | rectangle | display OCR: My Birreve Record -... First John Last Abercrombie Phone 512-555-2462 Record 268, 828.672 Num? City "State Phone =n_xErrLv1(0) && suppress error messages =n_xUse( "patients .dts". @stru ) IF n xError() ) 0 RETURN DO ErrStop WITH n_xError( ), n_xErrMiss ENDIF: ACTIVATE WINDOW UMyRec naXEOFCY DECLARE aMyArray[ n_xFcount () ] nixRecnot? 268828672 n xErrisigtly "Successful operation _xGotoTop & GOTO TOP n.xLas tRec 60 17 DO WHILE not _p XEOF () n.Field(4) : "LAST NAME 112 EN XSCATTER( @AN Array n xRecSiz(). SAY SAY First" GET allyArray[2] GET aMyArray.a 3. 20 Record GET aMyArray[9] TRANSFORM( n_ Recno() . "GR 999,999.999" READ VALID MyFunc( ) sh xGather! "patients dta :@aMyArray && GATHER to record En xUpdate ( ) && REPLACE into record ENDDO En XSkipt} && SKIPS Figure 3. RaSQL/B brings Btrieve data access to FoxPro for DOS.
